START




ADC

             bsf          ADCON0,GO ; 
             btfsc        ADCON0,GO ;   
             goto         $-1
;-------------------------------------------------------------------------------
             banksel     ADRESL     ;  
             movf        ADRESL,w
             banksel     ADC_temp
             movwf       ADC_temp
             movf        ADRESH,w
             movwf       ADC_temp+1
             bsf         GPIO,PIN_LOUD
;**************************************************************************************************
;*               
;**************************************************************************************************
            movlw       .190              ;    
            subwf        ADC_temp+1,w
            btfsc        STATUS, C
            goto         OFF_LOUD           
            
ON_LOUD     bsf          GPIO,PIN_LOUD
            goto         GTART            


OFF_LOUD    bcf          GPIO,PIN_LOUD





               
          goto         START